home *** CD-ROM | disk | FTP | other *** search
- object frmScanWizard: TfrmScanWizard
- Left = 324
- Top = 157
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Illuminator Wizard'
- ClientHeight = 343
- ClientWidth = 537
- Color = clBtnFace
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Verdana'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- ShowHint = True
- OnActivate = FormActivate
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object LMDAssist1: TLMDAssist
- Left = 0
- Top = 0
- Width = 537
- Height = 343
- ActivePage = LMDAssistPage1
- TabOrder = 0
- OnChange = LMDAssist1Change
- OnCompleted = LMDAssist1Completed
- OnChanging = LMDAssist1Changing
- object LMDAssistPage1: TLMDAssistPage
- Left = 2
- Top = 2
- Width = 533
- Height = 292
- Anchors = [akTop, akRight, akBottom]
- object bvBanner: TBevel
- Left = 417
- Top = 7
- Width = 110
- Height = 280
- end
- object imgBanner: TImage
- Left = 418
- Top = 8
- Width = 108
- Height = 278
- Anchors = [akTop, akRight]
- Stretch = True
- end
- object Label2: TLabel
- Left = 13
- Top = 10
- Width = 290
- Height = 24
- Caption = 'Welcome to the Illuminator Wizard!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label3: TLabel
- Left = 13
- Top = 62
- Width = 346
- Height = 26
- Caption =
- 'The wizard helps you to scan for images, videos, music and docum' +
- 'ents that are located on your computer.'
- WordWrap = True
- end
- object Label4: TLabel
- Left = 13
- Top = 265
- Width = 124
- Height = 13
- Caption = 'Click next to continue'
- end
- object Bevel1: TBevel
- Left = 13
- Top = 44
- Width = 375
- Height = 7
- Shape = bsTopLine
- end
- object Label18: TLabel
- Left = 13
- Top = 96
- Width = 326
- Height = 26
- Caption =
- 'The Illuminator is also a great tool to gain disk space by locat' +
- 'ing duplicate files and removing them.'
- WordWrap = True
- end
- end
- object LMDAssistPage2: TLMDAssistPage
- Left = 2
- Top = 2
- Width = 533
- Height = 292
- object Label1: TLabel
- Left = 13
- Top = 11
- Width = 282
- Height = 13
- Caption = 'Select a location where you want to scan for files'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Bevel2: TBevel
- Left = 13
- Top = 33
- Width = 375
- Height = 7
- Shape = bsTopLine
- end
- object cbScanSubfolders: TCheckBox
- Tag = 1
- Left = 13
- Top = 265
- Width = 132
- Height = 17
- Caption = '&Scan subfolders'
- Checked = True
- State = cbChecked
- TabOrder = 0
- end
- object ExplorerTreeView: TGXExplorerTreeView
- Left = 14
- Top = 64
- Width = 372
- Height = 193
- AutoRefresh = True
- Checkmarks = False
- CompressedColor = clWindowText
- FolderTypes = [ftFolders, ftIncludeSystem]
- HideSelection = False
- Indent = 19
- InfoTips = False
- Options = []
- RootFolder = rDesktop
- ScrollBars = True
- ShowRoot = False
- TabOrder = 1
- end
- object cbOpenCurrentDirectory: TCheckBox
- Left = 16
- Top = 40
- Width = 369
- Height = 17
- Caption = 'Open current directory'
- TabOrder = 2
- OnClick = cbOpenCurrentDirectoryClick
- end
- end
- object LMDAssistPage3: TLMDAssistPage
- Left = 2
- Top = 2
- Width = 533
- Height = 292
- object Label5: TLabel
- Left = 13
- Top = 11
- Width = 300
- Height = 13
- Caption = 'Select mediatypes (Right click on list to add filetype)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label11: TLabel
- Left = 13
- Top = 46
- Width = 76
- Height = 13
- AutoSize = False
- Caption = 'Images'
- end
- object Label14: TLabel
- Left = 109
- Top = 46
- Width = 76
- Height = 13
- AutoSize = False
- Caption = 'Videos'
- end
- object Label15: TLabel
- Left = 205
- Top = 46
- Width = 85
- Height = 13
- AutoSize = False
- Caption = 'Music/Sound'
- end
- object Bevel8: TBevel
- Left = 13
- Top = 33
- Width = 375
- Height = 7
- Shape = bsTopLine
- end
- object Label17: TLabel
- Left = 301
- Top = 46
- Width = 76
- Height = 13
- AutoSize = False
- Caption = 'Other'
- end
- object lbFilename: TLabel
- Left = 13
- Top = 245
- Width = 368
- Height = 13
- Caption =
- 'Part of filename (Optional: Use this option to narrow the search' +
- ')'
- end
- object clbImages: TCheckListBox
- Left = 13
- Top = 81
- Width = 82
- Height = 160
- OnClickCheck = clbImagesClickCheck
- ItemHeight = 13
- PopupMenu = popmImages
- Sorted = True
- TabOrder = 1
- end
- object clbVideos: TCheckListBox
- Left = 109
- Top = 81
- Width = 82
- Height = 160
- ItemHeight = 13
- PopupMenu = popmVideos
- Sorted = True
- TabOrder = 3
- OnClick = clbVideosClick
- end
- object clbSounds: TCheckListBox
- Left = 205
- Top = 81
- Width = 82
- Height = 160
- ItemHeight = 13
- PopupMenu = popmSounds
- Sorted = True
- TabOrder = 5
- OnClick = clbSoundsClick
- end
- object cbAllImages: TCheckBox
- Left = 13
- Top = 63
- Width = 45
- Height = 17
- Caption = 'All'
- Checked = True
- State = cbChecked
- TabOrder = 0
- OnClick = cbAllImagesClick
- end
- object cbAllVideos: TCheckBox
- Left = 109
- Top = 63
- Width = 45
- Height = 17
- Caption = 'All'
- Checked = True
- State = cbChecked
- TabOrder = 2
- OnClick = cbAllVideosClick
- end
- object cbAllSounds: TCheckBox
- Left = 205
- Top = 63
- Width = 45
- Height = 17
- Caption = 'All'
- Checked = True
- State = cbChecked
- TabOrder = 4
- OnClick = cbAllSoundsClick
- end
- object clbOthers: TCheckListBox
- Left = 301
- Top = 81
- Width = 82
- Height = 160
- ItemHeight = 13
- PopupMenu = popmOthers
- Sorted = True
- TabOrder = 6
- OnClick = clbOthersClick
- end
- object cbAllOthers: TCheckBox
- Left = 301
- Top = 63
- Width = 45
- Height = 17
- Caption = 'All'
- Checked = True
- State = cbChecked
- TabOrder = 7
- OnClick = cbAllOthersClick
- end
- object edFilename: TEdit
- Left = 13
- Top = 264
- Width = 121
- Height = 21
- TabOrder = 8
- end
- end
- object LMDAssistPage4: TLMDAssistPage
- Left = 2
- Top = 2
- Width = 533
- Height = 292
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- OnNextPage = LMDAssistPage4NextPage
- object Label6: TLabel
- Left = 13
- Top = 9
- Width = 68
- Height = 13
- Caption = 'Select Date'
- Font.Charset = ANSI_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object lbKb: TLabel
- Left = 242
- Top = 164
- Width = 13
- Height = 13
- Caption = 'Kb'
- end
- object Bevel9: TBevel
- Left = 13
- Top = 26
- Width = 375
- Height = 7
- Shape = bsTopLine
- end
- object Bevel10: TBevel
- Left = 13
- Top = 245
- Width = 375
- Height = 7
- Shape = bsTopLine
- end
- object Label16: TLabel
- Left = 13
- Top = 229
- Width = 79
- Height = 13
- Caption = 'Other Options'
- Font.Charset = ANSI_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label19: TLabel
- Left = 13
- Top = 112
- Width = 89
- Height = 13
- Caption = 'Select File Size'
- Font.Charset = ANSI_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Bevel11: TBevel
- Left = 13
- Top = 130
- Width = 375
- Height = 7
- Shape = bsTopLine
- end
- object rbtnAllSizes: TRadioButton
- Left = 13
- Top = 141
- Width = 380
- Height = 17
- Caption = 'Display all &file sizes:'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = rbtnAllSizesClick
- end
- object rbtnLargerThan: TRadioButton
- Left = 13
- Top = 162
- Width = 158
- Height = 17
- Caption = 'Display files &larger than:'
- TabOrder = 1
- OnClick = rbtnAllSizesClick
- end
- object rbtnSmallerThan: TRadioButton
- Left = 13
- Top = 186
- Width = 158
- Height = 17
- Caption = 'Display files &smaller than:'
- TabOrder = 2
- OnClick = rbtnAllSizesClick
- end
- object cbSkipInternetFiles: TCheckBox
- Tag = 2
- Left = 13
- Top = 254
- Width = 380
- Height = 17
- Caption = '&Skip temporary internet files'
- Checked = True
- State = cbChecked
- TabOrder = 3
- end
- object Panel1: TPanel
- Left = 14
- Top = 34
- Width = 385
- Height = 65
- BevelOuter = bvNone
- TabOrder = 4
- object rbAllDates: TRadioButton
- Left = 0
- Top = 3
- Width = 113
- Height = 17
- Caption = 'Display all &dates:'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object rbDateBefore: TRadioButton
- Left = 0
- Top = 24
- Width = 185
- Height = 17
- Caption = 'Display files created &before:'
- TabOrder = 1
- OnClick = rbDateBeforeClick
- end
- object rbDateLater: TRadioButton
- Left = 0
- Top = 44
- Width = 177
- Height = 17
- Caption = 'Display files created &after:'
- TabOrder = 2
- OnClick = rbDateBeforeClick
- end
- object DateTimePicker: TDateTimePicker
- Left = 208
- Top = 24
- Width = 113
- Height = 21
- CalAlignment = dtaLeft
- Date = 37194.549710289300000000
- Time = 37194.549710289300000000
- DateFormat = dfShort
- DateMode = dmComboBox
- Kind = dtkDate
- ParseInput = False
- TabOrder = 3
- end
- end
- object edFileSize: TEdit
- Left = 182
- Top = 160
- Width = 55
- Height = 21
- Enabled = False
- TabOrder = 5
- Text = '25'
- OnExit = edFileSizeExit
- end
- end
- object LMDAssistPage5: TLMDAssistPage
- Left = 2
- Top = 2
- Width = 533
- Height = 292
- object Label12: TLabel
- Left = 13
- Top = 11
- Width = 367
- Height = 39
- Caption =
- 'Congratulations! The wizard is now ready to scan for files on y' +
- 'our computer. Below are the options you have selected. Press ' +
- 'the Finish button to start the scan, or press Back to change som' +
- 'e options.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Label13: TLabel
- Left = 13
- Top = 270
- Width = 143
- Height = 13
- Caption = 'Click Finish to start scan!'
- end
- object memSummary: TMemo
- Left = 13
- Top = 56
- Width = 375
- Height = 209
- Enabled = False
- Lines.Strings = (
- 'Location'
- 'c:\pictures'
- ''
- 'FILETYPES'
- 'Images - Jpg, Bmp, Gif'
- 'Movies - All'
- 'Sound - All'
- ''
- 'File Sizes'
- 'All Files Between 10 Kb and 2000 Kb')
- TabOrder = 0
- end
- end
- end
- object IvTranslator: TIvTranslator
- DictionaryName = 'Dictionary'
- Left = 111
- Top = 148
- TargetsData = (
- 1
- 6
- (
- ''
- 'Hint'
- 0)
- (
- ''
- 'Caption'
- 0)
- (
- ''
- 'Items'
- 0)
- (
- 'TMemo'
- 'Text'
- 0)
- (
- ''
- 'Lines'
- 0)
- (
- ''
- 'Filter'
- 0))
- end
- object popmImages: TPopupMenu
- Left = 93
- Top = 311
- object pmiImagesAdd: TMenuItem
- Caption = '&Add'
- OnClick = pmiImagesAddClick
- end
- object pmiImagesDelete: TMenuItem
- Caption = '&Delete'
- OnClick = pmiImagesDeleteClick
- end
- end
- object popmVideos: TPopupMenu
- Left = 123
- Top = 312
- object pmiVideosAdd: TMenuItem
- Caption = '&Add'
- OnClick = pmiImagesAddClick
- end
- object pmiVideosDelete: TMenuItem
- Caption = '&Delete'
- OnClick = pmiImagesDeleteClick
- end
- end
- object popmSounds: TPopupMenu
- Left = 150
- Top = 311
- object pmiSoundsAdd: TMenuItem
- Caption = '&Add'
- OnClick = pmiImagesAddClick
- end
- object pmiSoundsDelete: TMenuItem
- Caption = '&Delete'
- OnClick = pmiImagesDeleteClick
- end
- end
- object popmOthers: TPopupMenu
- Left = 194
- Top = 311
- object pmiOthersAdd: TMenuItem
- Caption = '&Add'
- OnClick = pmiImagesAddClick
- end
- object pmiOthersDelete: TMenuItem
- Caption = '&Delete'
- OnClick = pmiImagesDeleteClick
- end
- end
- end
-